00100 NUTTY 00200 HARDS 0 1 8; 00300 P2 NUM/1 X 8*; 00400 P3 NUM/49 X 8*; 00500 P4 1700/P5 F6/P6 F6/P7 F15/P8 FUNC/5/2/7/7/REP 4,1*; 00550 P9 "P3+6"/P10 P2/P11 F1/END; 00600 RUN;